home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Info-Mac 4
/
Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso
/
Development
/
Source
/
MSG Demo 1.4.source Folder
/
Demo ƒ
/
Wipes ƒ
/
Circle out.c
< prev
next >
Wrap
Text File
|
1994-04-15
|
3KB
|
80 lines
/**********************************************************************\
File: Circle out.c
Purpose: Graphic effect from offscreen bitmap to main window (on
screen). See comments below for more description.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program in a file named "GNU General Public License".
If not, write to the Free Software Foundation, 675 Mass Ave,
Cambridge, MA 02139, USA.
\**********************************************************************/
#include "timing.h"
#define gap 4 /* difference between one radius and the next */
#define CorrectTime 2
#define theWindowHeight (boundsRect.bottom-boundsRect.top)
#define theWindowWidth (boundsRect.right-boundsRect.left)
pascal short CircleOut(GrafPtr sourceGrafPtr, GrafPtr destGrafPtr, Rect boundsRect);
/* Make a circular region and use it as the mask in CopyBits. Lots of overlap,
but masked by timing correction. If you want to optimize it, look at the
donut region code in "Circle in.c" */
pascal short CircleOut(GrafPtr sourceGrafPtr, GrafPtr destGrafPtr, Rect boundsRect)
{
Rect theRect;
int cx, cy;
RgnHandle curregion;
Point zeroPoint;
zeroPoint.h=boundsRect.left;
zeroPoint.v=boundsRect.top;
cx = theWindowWidth / 2;
cy = theWindowHeight / 2;
theRect.left=cx-gap; /* circumscribing rectangle for circle */
theRect.right=cx+gap;
theRect.top=cy-gap;
theRect.bottom=cy+gap;
OffsetRect(&theRect, boundsRect.left, boundsRect.top);
curregion=NewRgn();
do
{
StartTiming();
SetEmptyRgn(curregion);
OpenRgn();
FrameOval(&theRect); /* the circle region */
CloseRgn(curregion);
CopyBits(&(sourceGrafPtr->portBits), &(destGrafPtr->portBits),
&boundsRect, &boundsRect, 0, curregion);
theRect.left-=gap; /* make the rect bigger (and thus the circle) */
theRect.right+=gap;
theRect.top-=gap;
theRect.bottom+=gap;
TimeCorrection(CorrectTime);
}
while (!PtInRgn(zeroPoint, curregion));
DisposeRgn(curregion);
return 0;
}